|
real(kind=real64),
|
public, |
parameter
|
:: |
a101 |
= |
4.77662536438264365890433908527d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a104 |
= |
-2.48811461997166764192642586468d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a105 |
= |
-5.90290826836842996371446475743d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a106 |
= |
2.12300514481811942347288949897d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a107 |
= |
1.52792336328824235832596922938d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a108 |
= |
-3.32882109689848629194453265587d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a109 |
= |
-2.03312017085086261358222928593d-2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a111 |
= |
-9.3714243008598732571704021658d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a1110 |
= |
-3.0467644718982195003823669022d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a114 |
= |
5.18637242884406370830023853209d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a115 |
= |
1.09143734899672957818500254654d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a116 |
= |
-8.14978701074692612513997267357d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a117 |
= |
-1.85200656599969598641566180701d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a118 |
= |
2.27394870993505042818970056734d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a119 |
= |
2.49360555267965238987089396762d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a121 |
= |
2.27331014751653820792359768449d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a1210 |
= |
1.23605671757943030647266201528d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a1211 |
= |
6.43392746015763530355970484046d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a124 |
= |
-1.05344954667372501984066689879d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a125 |
= |
-2.00087205822486249909675718444d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a126 |
= |
-1.79589318631187989172765950534d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a127 |
= |
2.79488845294199600508499808837d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a128 |
= |
-2.85899827713502369474065508674d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a129 |
= |
-8.87285693353062954433549289258d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a141 |
= |
5.61675022830479523392909219681d-2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a1410 |
= |
1.5329179827876569731206322685d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a1411 |
= |
8.20105229563468988491666602057d-3 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a1412 |
= |
7.56789766054569976138603589584d-3 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a1413 |
= |
-8.298d-3 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a147 |
= |
2.53500210216624811088794765333d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a148 |
= |
-2.46239037470802489917441475441d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a149 |
= |
-1.24191423263816360469010140626d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a151 |
= |
3.18346481635021405060768473261d-2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a1511 |
= |
-1.08347328697249322858509316994d-4 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a1512 |
= |
3.82571090835658412954920192323d-4 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a1513 |
= |
-3.40465008687404560802977114492d-4 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a1514 |
= |
1.41312443674632500278074618366d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a156 |
= |
2.83009096723667755288322961402d-2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a157 |
= |
5.35419883074385676223797384372d-2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a158 |
= |
-5.49237485713909884646569340306d-2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a161 |
= |
-4.28896301583791923408573538692d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a1613 |
= |
-1.39902416515901462129418009734d-3 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a1614 |
= |
2.9475147891527723389556272149d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a1615 |
= |
-9.15095847217987001081870187138d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a166 |
= |
-4.69762141536116384314449447206d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a167 |
= |
7.68342119606259904184240953878d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a168 |
= |
4.06898981839711007970213554331d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a169 |
= |
3.56727187455281109270669543021d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a21 |
= |
5.26001519587677318785587544488d-2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a31 |
= |
1.97250569845378994544595329183d-2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a32 |
= |
5.91751709536136983633785987549d-2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a41 |
= |
2.95875854768068491816892993775d-2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a43 |
= |
8.87627564304205475450678981324d-2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a51 |
= |
2.41365134159266685502369798665d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a53 |
= |
-8.84549479328286085344864962717d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a54 |
= |
9.24834003261792003115737966543d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a61 |
= |
3.7037037037037037037037037037d-2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a64 |
= |
1.70828608729473871279604482173d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a65 |
= |
1.25467687566822425016691814123d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a71 |
= |
3.7109375d-2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a74 |
= |
1.70252211019544039314978060272d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a75 |
= |
6.02165389804559606850219397283d-2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a76 |
= |
-1.7578125d-2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a81 |
= |
3.70920001185047927108779319836d-2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a84 |
= |
1.70383925712239993810214054705d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a85 |
= |
1.07262030446373284651809199168d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a86 |
= |
-1.53194377486244017527936158236d-2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a87 |
= |
8.27378916381402288758473766002d-3 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a91 |
= |
6.24110958716075717114429577812d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a94 |
= |
-3.36089262944694129406857109825d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a95 |
= |
-8.68219346841726006818189891453d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a96 |
= |
2.75920996994467083049415600797d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a97 |
= |
2.01540675504778934086186788979d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
a98 |
= |
-4.34898841810699588477366255144d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
b1 |
= |
5.42937341165687622380535766363d-2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
b10 |
= |
-1.52160949662516078556178806805d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
b11 |
= |
2.01365400804030348374776537501d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
b12 |
= |
4.47106157277725905176885569043d-2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
b6 |
= |
4.45031289275240888144113950566d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
b7 |
= |
1.89151789931450038304281599044d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
b8 |
= |
-5.8012039600105847814672114227d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
b9 |
= |
3.1116436695781989440891606237d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
bhh1 |
= |
0.244094488188976377952755905512d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
bhh2 |
= |
0.733846688281611857341361741547d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
bhh3 |
= |
0.220588235294117647058823529412d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
c10 |
= |
0.6d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
c11 |
= |
0.857142857142857142857142857142d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
c14 |
= |
0.1d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
c15 |
= |
0.2d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
c16 |
= |
0.777777777777777777777777777778d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
c2 |
= |
0.526001519587677318785587544488d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
c3 |
= |
0.789002279381515978178381316732d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
c4 |
= |
0.118350341907227396726757197510d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
c5 |
= |
0.281649658092772603273242802490d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
c6 |
= |
0.333333333333333333333333333333d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
c7 |
= |
0.25d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
c8 |
= |
0.307692307692307692307692307692d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
c9 |
= |
0.651282051282051282051282051282d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d41 |
= |
-0.84289382761090128651353491142d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d410 |
= |
-0.87139158377797299206789907490d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d411 |
= |
0.22404374302607882758541771650d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d412 |
= |
0.63157877876946881815570249290d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d413 |
= |
-0.88990336451333310820698117400d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d414 |
= |
0.18148505520854727256656404962d2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d415 |
= |
-0.91946323924783554000451984436d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d416 |
= |
-0.44360363875948939664310572000d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d46 |
= |
0.56671495351937776962531783590d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d47 |
= |
-0.30689499459498916912797304727d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d48 |
= |
0.23846676565120698287728149680d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d49 |
= |
0.21170345824450282767155149946d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d51 |
= |
0.10427508642579134603413151009d2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d510 |
= |
0.77334326684722638389603898808d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d511 |
= |
-0.30674084731089398182061213626d2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d512 |
= |
-0.93321305264302278729567221706d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d513 |
= |
0.15697238121770843886131091075d2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d514 |
= |
-0.31139403219565177677282850411d2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d515 |
= |
-0.93529243588444783865713862664d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d516 |
= |
0.35816841486394083752465898540d2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d56 |
= |
0.24228349177525818288430175319d3 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d57 |
= |
0.16520045171727028198505394887d3 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d58 |
= |
-0.37454675472269020279518312152d3 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d59 |
= |
-0.22113666853125306036270938578d2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d61 |
= |
0.19985053242002433820987653617d2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d610 |
= |
0.68812326946963000169666922661d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d611 |
= |
-0.10006050966910838403183860980d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d612 |
= |
0.77771377980534432092869265740d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d613 |
= |
-0.27782057523535084065932004339d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d614 |
= |
-0.60196695231264120758267380846d2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d615 |
= |
0.84320405506677161018159903784d2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d616 |
= |
0.11992291136182789328035130030d2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d66 |
= |
-0.38703730874935176555105901742d3 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d67 |
= |
-0.18917813819516756882830838328d3 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d68 |
= |
0.52780815920542364900561016686d3 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d69 |
= |
-0.11573902539959630126141871134d2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d71 |
= |
-0.25693933462703749003312586129d2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d710 |
= |
-0.37458323136451633156875139351d2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d711 |
= |
0.10409964950896230045147246184d3 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d712 |
= |
0.29840293426660503123344363579d2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d713 |
= |
-0.43533456590011143754432175058d2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d714 |
= |
0.96324553959188282948394950600d2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d715 |
= |
-0.39177261675615439165231486172d2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d716 |
= |
-0.14972683625798562581422125276d3 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d76 |
= |
-0.15418974869023643374053993627d3 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d77 |
= |
-0.23152937917604549567536039109d3 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d78 |
= |
0.35763911791061412378285349910d3 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
d79 |
= |
0.93405324183624310003907691704d2 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
er1 |
= |
0.1312004499419488073250102996d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
er10 |
= |
0.3341791187130174790297318841d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
er11 |
= |
0.8192320648511571246570742613d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
er12 |
= |
-0.2235530786388629525884427845d-1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
er6 |
= |
-0.1225156446376204440720569753d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
er7 |
= |
-0.4957589496572501915214079952d0 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
er8 |
= |
0.1664377182454986536961530415d1 |
|
|
real(kind=real64),
|
public, |
parameter
|
:: |
er9 |
= |
-0.3503288487499736816886487290d0 |
|